From: Glenn Morris Date: Thu, 29 Sep 2011 07:21:06 +0000 (-0700) Subject: * lisp/pcmpl-cvs.el (pcomplete/cvs): Add "status" handler. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~2091 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=cff5e20213ab3dbd25bf3514788184292c264f29;p=emacs.git * lisp/pcmpl-cvs.el (pcomplete/cvs): Add "status" handler. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c1b6b50f08b..2779a828991 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2011-09-29 Glenn Morris + + * pcmpl-cvs.el (pcomplete/cvs): Add "status" handler. + 2011-09-29 Juanma Barranquero * descr-text.el (describe-char-categories): Accept category diff --git a/lisp/pcmpl-cvs.el b/lisp/pcmpl-cvs.el index 3ff07bca20e..9c9b72ab701 100644 --- a/lisp/pcmpl-cvs.el +++ b/lisp/pcmpl-cvs.el @@ -107,6 +107,10 @@ "j(pcmpl-cvs-tags '(?U ?P))" "I(pcmpl-cvs-entries '(??))W?")) (while (pcomplete-here (pcmpl-cvs-entries '(?U ?P))))) + ((pcomplete-test "status") + (setq pcomplete-help "(cvs)File status") + (pcomplete-opt "vlR") + (while (pcomplete-here (pcmpl-cvs-entries)))) (t (while (pcomplete-here (pcmpl-cvs-entries)))))))